home *** CD-ROM | disk | FTP | other *** search
/ Aminet 2 / Aminet AMIGA CDROM (1994)(Walnut Creek)[Feb 1994][W.O. 44790-1].iso / Aminet / dev / asm / TBSource.lha / SimCC / SCCMenus.i < prev    next >
Text File  |  1993-07-02  |  9KB  |  365 lines
  1.  
  2. ;Menus
  3.  
  4. Menu1:        dc.l    Menu2            ;NEXT MENU
  5.         dc.w    0,1            ;LEFT+TOP EDGE
  6.         dc.w    90,8            ;WIDTH+HEIGHT
  7.         dc.w    $0001            ;FLAGS
  8.         dc.l    Menu1Name        ;NAME
  9.         dc.l    Menu1Item2        ;ITEMS
  10.         dc.w    0,0            ;Some Jazz-music here...        
  11.         dc.w    0,0,0            ;(with a good beat)
  12.  
  13. Menu1Name:    dc.b    "Project",0
  14.         ds.l    0
  15.  
  16. Menu1Item2:    dc.l    Menu1Item3        ;NEXT ITEM
  17.         dc.w    1,0            ;LEFT+TOP EDGE
  18.         dc.w    110,9            ;WIDTH+HEIGHT
  19.         dc.w    $0056            ;FLAGS
  20.         dc.l    0            ;MUTUAL EXCLUDE
  21.         dc.l    Menu1I2            ;ITEMFILL (IMAGE,ITEXT,GFX)
  22.         dc.l    0            ;SELECTFILL
  23.         dc.b    "C",0            ;COMMAND
  24.         dc.l    0            ;SubItem
  25.         dc.w    $ffff            ;NextSelect
  26.         
  27. Menu1I2:    dc.b    0,1            ;PENS
  28.         dc.w    0            ;MODE
  29.         dc.w    1,1            ;LEFT+TOPEDGE
  30.         dc.l    Topaz            ;FONT
  31.         dc.l    Menu1I2Text        ;TEXT
  32.         dc.l    0            ;NEXTTEXT
  33.  
  34. Menu1I2Text:    dc.b    "CHEAT!...",0
  35.         ds.l    0
  36.  
  37. Menu1Item3:    dc.l    Menu1Item4        ;NEXT ITEM
  38.         dc.w    1,11            ;LEFT+TOP EDGE
  39.         dc.w    110,8            ;WIDTH+HEIGHT
  40.         dc.w    $0056            ;FLAGS
  41.         dc.l    0            ;MUTUAL EXCLUDE
  42.         dc.l    Menu1I3            ;ITEMFILL (IMAGE,ITEXT,GFX)
  43.         dc.l    0            ;SELECTFILL
  44.         dc.b    "H",0            ;COMMAND
  45.         dc.l    0            ;SubItem
  46.         dc.w    $ffff            ;NextSelect
  47.         
  48. Menu1I3:    dc.b    0,1            ;PENS
  49.         dc.w    0            ;MODE
  50.         dc.w    1,0            ;LEFT+TOPEDGE
  51.         dc.l    Topaz            ;FONT
  52.         dc.l    Menu1I3Text        ;TEXT
  53.         dc.l    0            ;NEXTTEXT
  54.  
  55. Menu1I3Text:    dc.b    "Help...",0
  56.         ds.l    0
  57.  
  58. Menu1Item4:    dc.l    Menu1Item5        ;NEXT ITEM
  59.         dc.w    1,21            ;LEFT+TOP EDGE
  60.         dc.w    110,8            ;WIDTH+HEIGHT
  61.         dc.w    $0056            ;FLAGS
  62.         dc.l    0            ;MUTUAL EXCLUDE
  63.         dc.l    Menu1I4            ;ITEMFILL (IMAGE,ITEXT,GFX)
  64.         dc.l    0            ;SELECTFILL
  65.         dc.b    "A",0            ;COMMAND
  66.         dc.l    0            ;SubItem
  67.         dc.w    $ffff            ;NextSelect
  68.         
  69. Menu1I4:    dc.b    0,1            ;PENS
  70.         dc.w    0            ;MODE
  71.         dc.w    1,0            ;LEFT+TOPEDGE
  72.         dc.l    Topaz            ;FONT
  73.         dc.l    Menu1I4Text        ;TEXT
  74.         dc.l    0            ;NEXTTEXT
  75.  
  76. Menu1I4Text:    dc.b    "About...",0
  77.         ds.l    0
  78.  
  79. Menu1Item5:    dc.l    0            ;NEXT ITEM
  80.         dc.w    1,31            ;LEFT+TOP EDGE
  81.         dc.w    110,9            ;WIDTH+HEIGHT
  82.         dc.w    $0056            ;FLAGS
  83.         dc.l    0            ;MUTUAL EXCLUDE
  84.         dc.l    Menu1I5            ;ITEMFILL (IMAGE, ITEXT,GFX)
  85.         dc.l    0            ;SELECTFILL
  86.         dc.b     "Q",0            ;COMMAND
  87.         dc.l    0            ;IF<>0SubItem Shows ->
  88.         dc.w    $ffff            ;NextSelect
  89.  
  90. Menu1I5:    dc.b    0,1            ;PENS
  91.         dc.w    0            ;MODE
  92.         dc.w    1,0            ;LEFT+TOPEDGE
  93.         dc.l    Topaz            ;FONT
  94.         dc.l    Menu1I5Text        ;TEXT
  95.         dc.l    0            ;NEXTTEXT
  96.     
  97. Menu1I5Text:    dc.b    "Quit",0
  98.         ds.l    0
  99.  
  100. Menu2:        dc.l    0            ;NEXT MENU
  101.         dc.w    91,0            ;LEFT+TOP EDGE
  102.         dc.w    110,8            ;WIDTH+HEIGHT
  103.         dc.w    $0001            ;FLAGS
  104.         dc.l    Menu2Name        ;NAME
  105.         dc.l    Menu2Item1        ;ITEMS
  106.         dc.w    0,0            ;Some Jazz-music here...        
  107.         dc.w    0,0,0            ;(with a good beat)
  108.  
  109. Menu2Name:    dc.b    "Games",0
  110.         ds.l    0
  111.  
  112. Menu2Item1:    dc.l    0 ;Menu1Item2        ;NEXT ITEM
  113.         dc.w    1,0            ;LEFT+TOP EDGE
  114.         dc.w    110,9            ;WIDTH+HEIGHT
  115.         dc.w    HIGHCOMP+ITEMENABLED+ITEMTEXT    ;FLAGS
  116.         dc.l    0            ;MUTUAL EXCLUDE
  117.         dc.l    Menu2I1            ;ITEMFILL (IMAGE,ITEXT,GFX)
  118.         dc.l    0            ;SELECTFILL
  119.         dc.b    0,0            ;COMMAND
  120.         dc.l    Menu2I1Sub1        ;SubItem
  121.         dc.w    $ffff            ;NextSelect
  122.         
  123. Menu2I1:    dc.b    0,1            ;PENS
  124.         dc.w    0            ;MODE
  125.         dc.w    1,1            ;LEFT+TOPEDGE
  126.         dc.l    Topaz            ;FONT
  127.         dc.l    Menu2I1Text        ;TEXT
  128.         dc.l    0            ;NEXTTEXT
  129.  
  130. Menu2I1Text:    dc.b    "Games 1     ",$bb,0
  131.         ds.l    0
  132.  
  133. Menu2I1Sub1:    dc.l    Menu2I1Sub2        ;NEXT ITEM
  134.         dc.w    90,1            ;LEFT+TOP EDGE
  135.         dc.w    185,8            ;WIDTH+HEIGHT
  136.         dc.w    COMMSEQ+HIGHCOMP+ITEMENABLED+ITEMTEXT+CHECKIT+CHECKED
  137.         dc.w    $ffff            ;MUTUAL EXCLUDE
  138.         dc.b    $ff
  139.         dc.b    %11111110
  140.         dc.l    Menu2I1S1        ;ITEMFILL (IMAGE,ITEXT,GFX)
  141.         dc.l    0            ;SELECTFILL
  142.         dc.b    "1",0            ;COMMAND
  143.         dc.l    0            ;SubItem
  144.         dc.w    $ffff            ;NextSelect
  145.         
  146. Menu2I1S1:    dc.b    0,1            ;PENS
  147.         dc.w    0            ;MODE
  148.         dc.w    20,0            ;LEFT+TOPEDGE
  149.         dc.l    Topaz            ;FONT
  150.         dc.l    Menu2I1S1Text        ;TEXT
  151.         dc.l    0            ;NEXTTEXT
  152.  
  153. Menu2I1S1Text:    dc.b    "SimCity",0
  154.         ds.l    0
  155.  
  156. Menu2I1Sub2:    dc.l    Menu2I1Sub3        ;NEXT ITEM
  157.         dc.w    90,10            ;LEFT+TOP EDGE
  158.         dc.w    185,9            ;WIDTH+HEIGHT
  159.         dc.w    COMMSEQ+HIGHCOMP+ITEMENABLED+ITEMTEXT+CHECKIT
  160.         dc.w    $ffff            ;MUTUAL EXCLUDE
  161.         dc.b    $ff
  162.         dc.b    %11111101
  163.         dc.l    Menu2I1S2        ;ITEMFILL (IMAGE,ITEXT,GFX)
  164.         dc.l    0            ;SELECTFILL
  165.         dc.b    "2",0            ;COMMAND
  166.         dc.l    0            ;SubItem
  167.         dc.w    $ffff            ;NextSelect
  168.         
  169. Menu2I1S2:    dc.b    0,1            ;PENS
  170.         dc.w    0            ;MODE
  171.         dc.w    20,0            ;LEFT+TOPEDGE
  172.         dc.l    Topaz            ;FONT
  173.         dc.l    Menu2I1S2Text        ;TEXT
  174.         dc.l    0            ;NEXTTEXT
  175.  
  176. Menu2I1S2Text:    dc.b    "Ports of Call #1",0
  177.         ds.l    0
  178.  
  179. Menu2I1Sub3:    dc.l    Menu2I1Sub4        ;NEXT ITEM
  180.         dc.w    90,19            ;LEFT+TOP EDGE
  181.         dc.w    185,9            ;WIDTH+HEIGHT
  182.         dc.w    COMMSEQ+HIGHCOMP+ITEMTEXT+CHECKIT ;+ITEMENABLED
  183.         dc.w    $ffff            ;MUTUAL EXCLUDE
  184.         dc.b    $ff
  185.         dc.b    %11111011
  186.         dc.l    Menu2I1S3        ;ITEMFILL (IMAGE,ITEXT,GFX)
  187.         dc.l    0            ;SELECTFILL
  188.         dc.b    "3",0            ;COMMAND
  189.         dc.l    0            ;SubItem
  190.         dc.w    $ffff            ;NextSelect
  191.         
  192. Menu2I1S3:    dc.b    0,1            ;PENS
  193.         dc.w    0            ;MODE
  194.         dc.w    20,0            ;LEFT+TOPEDGE
  195.         dc.l    Topaz            ;FONT
  196.         dc.l    Menu2I1S3Text        ;TEXT
  197.         dc.l    0            ;NEXTTEXT
  198.  
  199. Menu2I1S3Text:    dc.b    "Ports of Call #2",0
  200.         ds.l    0
  201.  
  202. Menu2I1Sub4:    dc.l    Menu2I1Sub5        ;NEXT ITEM
  203.         dc.w    90,28            ;LEFT+TOP EDGE
  204.         dc.w    185,9            ;WIDTH+HEIGHT
  205.         dc.w    COMMSEQ+HIGHCOMP+ITEMTEXT+CHECKIT    ;ITEMENABLED+
  206.         dc.w    $ffff            ;MUTUAL EXCLUDE
  207.         dc.b    $ff
  208.         dc.b    %11110111
  209.         dc.l    Menu2I1S4        ;ITEMFILL (IMAGE,ITEXT,GFX)
  210.         dc.l    0            ;SELECTFILL
  211.         dc.b    "4",0            ;COMMAND
  212.         dc.l    0            ;SubItem
  213.         dc.w    $ffff            ;NextSelect
  214.         
  215. Menu2I1S4:    dc.b    0,1            ;PENS
  216.         dc.w    0            ;MODE
  217.         dc.w    20,0            ;LEFT+TOPEDGE
  218.         dc.l    Topaz            ;FONT
  219.         dc.l    Menu2I1S4Text        ;TEXT
  220.         dc.l    0            ;NEXTTEXT
  221.  
  222. Menu2I1S4Text:    dc.b    "Ports of Call #3",0
  223.         ds.l    0
  224.  
  225. Menu2I1Sub5:    dc.l    Menu2I1Sub6        ;NEXT ITEM
  226.         dc.w    90,37            ;LEFT+TOP EDGE
  227.         dc.w    185,9            ;WIDTH+HEIGHT
  228.         dc.w    COMMSEQ+HIGHCOMP+ITEMTEXT+CHECKIT ;ITEMENABLED+
  229.         dc.w    $ffff            ;MUTUAL EXCLUDE
  230.         dc.b    $ff
  231.         dc.b    %11101111
  232.         dc.l    Menu2I1S5        ;ITEMFILL (IMAGE,ITEXT,GFX)
  233.         dc.l    0            ;SELECTFILL
  234.         dc.b    "5",0            ;COMMAND
  235.         dc.l    0            ;SubItem
  236.         dc.w    $ffff            ;NextSelect
  237.         
  238. Menu2I1S5:    dc.b    0,1            ;PENS
  239.         dc.w    0            ;MODE
  240.         dc.w    20,0            ;LEFT+TOPEDGE
  241.         dc.l    Topaz            ;FONT
  242.         dc.l    Menu2I1S5Text        ;TEXT
  243.         dc.l    0            ;NEXTTEXT
  244.  
  245. Menu2I1S5Text:    dc.b    "Ports of Call #4",0
  246.         ds.l    0
  247.  
  248. Menu2I1Sub6:    dc.l    Menu2I1Sub7        ;NEXT ITEM
  249.         dc.w    90,46            ;LEFT+TOP EDGE
  250.         dc.w    185,9            ;WIDTH+HEIGHT
  251.         dc.w    COMMSEQ+HIGHCOMP+ITEMENABLED+ITEMTEXT+CHECKIT
  252.         dc.w    $ffff            ;MUTUAL EXCLUDE
  253.         dc.b    $ff
  254.         dc.b    %11011111
  255.         dc.l    Menu2I1S6        ;ITEMFILL (IMAGE,ITEXT,GFX)
  256.         dc.l    0            ;SELECTFILL
  257.         dc.b    "6",0            ;COMMAND
  258.         dc.l    0            ;SubItem
  259.         dc.w    $ffff            ;NextSelect
  260.         
  261. Menu2I1S6:    dc.b    0,1            ;PENS
  262.         dc.w    0            ;MODE
  263.         dc.w    20,0            ;LEFT+TOPEDGE
  264.         dc.l    Topaz            ;FONT
  265.         dc.l    Menu2I1S6Text        ;TEXT
  266.         dc.l    0            ;NEXTTEXT
  267.  
  268. Menu2I1S6Text:    dc.b    "Oil Imperium #1",0
  269.         ds.l    0
  270.  
  271. Menu2I1Sub7:    dc.l    Menu2I1Sub8        ;NEXT ITEM
  272.         dc.w    90,55            ;LEFT+TOP EDGE
  273.         dc.w    185,9            ;WIDTH+HEIGHT
  274.         dc.w    COMMSEQ+HIGHCOMP+ITEMENABLED+ITEMTEXT+CHECKIT
  275.         dc.w    $ffff            ;MUTUAL EXCLUDE
  276.         dc.b    $ff
  277.         dc.b    %10111111
  278.         dc.l    Menu2I1S7        ;ITEMFILL (IMAGE,ITEXT,GFX)
  279.         dc.l    0            ;SELECTFILL
  280.         dc.b    "7",0            ;COMMAND
  281.         dc.l    0            ;SubItem
  282.         dc.w    $ffff            ;NextSelect
  283.         
  284. Menu2I1S7:    dc.b    0,1            ;PENS
  285.         dc.w    0            ;MODE
  286.         dc.w    20,0            ;LEFT+TOPEDGE
  287.         dc.l    Topaz            ;FONT
  288.         dc.l    Menu2I1S7Text        ;TEXT
  289.         dc.l    0            ;NEXTTEXT
  290.  
  291. Menu2I1S7Text:    dc.b    "Oil Imperium #2",0
  292.         ds.l    0
  293.  
  294. Menu2I1Sub8:    dc.l    Menu2I1Sub9        ;NEXT ITEM
  295.         dc.w    90,64            ;LEFT+TOP EDGE
  296.         dc.w    185,9            ;WIDTH+HEIGHT
  297.         dc.w    COMMSEQ+HIGHCOMP+ITEMENABLED+ITEMTEXT+CHECKIT
  298.         dc.w    $ffff            ;MUTUAL EXCLUDE
  299.         dc.b    $ff
  300.         dc.b    %01111111
  301.         dc.l    Menu2I1S8        ;ITEMFILL (IMAGE,ITEXT,GFX)
  302.         dc.l    0            ;SELECTFILL
  303.         dc.b    "8",0            ;COMMAND
  304.         dc.l    0            ;SubItem
  305.         dc.w    $ffff            ;NextSelect
  306.         
  307. Menu2I1S8:    dc.b    0,1            ;PENS
  308.         dc.w    0            ;MODE
  309.         dc.w    20,0            ;LEFT+TOPEDGE
  310.         dc.l    Topaz            ;FONT
  311.         dc.l    Menu2I1S8Text        ;TEXT
  312.         dc.l    0            ;NEXTTEXT
  313.  
  314. Menu2I1S8Text:    dc.b    "Oil Imperium #3",0
  315.         ds.l    0
  316.  
  317. Menu2I1Sub9:    dc.l    Menu2I1Sub10        ;NEXT ITEM
  318.         dc.w    90,73            ;LEFT+TOP EDGE
  319.         dc.w    185,9            ;WIDTH+HEIGHT
  320.         dc.w    COMMSEQ+HIGHCOMP+ITEMENABLED+ITEMTEXT+CHECKIT
  321.         dc.w    $ffff            ;MUTUAL EXCLUDE
  322.         dc.b    %11111110
  323.         dc.b    $ff
  324.         dc.l    Menu2I1S9        ;ITEMFILL (IMAGE,ITEXT,GFX)
  325.         dc.l    0            ;SELECTFILL
  326.         dc.b    "9",0            ;COMMAND
  327.         dc.l    0            ;SubItem
  328.         dc.w    $ffff            ;NextSelect
  329.         
  330. Menu2I1S9:    dc.b    0,1            ;PENS
  331.         dc.w    0            ;MODE
  332.         dc.w    20,0            ;LEFT+TOPEDGE
  333.         dc.l    Topaz            ;FONT
  334.         dc.l    Menu2I1S9Text        ;TEXT
  335.         dc.l    0            ;NEXTTEXT
  336.  
  337. Menu2I1S9Text:    dc.b    "Oil Imperium #4",0
  338.         ds.l    0
  339.  
  340. Menu2I1Sub10:    dc.l    0 ;Menu2I1Sub11        ;NEXT ITEM
  341.         dc.w    90,82            ;LEFT+TOP EDGE
  342.         dc.w    185,9            ;WIDTH+HEIGHT
  343.         dc.w    COMMSEQ+HIGHCOMP+ITEMENABLED+ITEMTEXT+CHECKIT
  344.         dc.w    $ffff            ;MUTUAL EXCLUDE
  345.         dc.b    %11111101
  346.         dc.b    $ff
  347.         dc.l    Menu2I1S10        ;ITEMFILL (IMAGE,ITEXT,GFX)
  348.         dc.l    0            ;SELECTFILL
  349.         dc.b    "0",0            ;COMMAND
  350.         dc.l    0            ;SubItem
  351.         dc.w    $ffff            ;NextSelect
  352.         
  353. Menu2I1S10:    dc.b    0,1            ;PENS
  354.         dc.w    0            ;MODE
  355.         dc.w    20,0            ;LEFT+TOPEDGE
  356.         dc.l    Topaz            ;FONT
  357.         dc.l    Menu2I1S10Text        ;TEXT
  358.         dc.l    0            ;NEXTTEXT
  359.  
  360. Menu2I1S10Text:    dc.b    "RailRoad Tycoon",0
  361.         ds.l    0
  362.  
  363. ;              11111111111111111111111111110111
  364. ;              12345678901234567890123456789012
  365.